home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Tools 4
/
Amiga Tools 4.iso
/
tools
/
mail-tools
/
thor
/
thor_2.22
/
thor.lha
/
rexx
/
BBSRead
/
PackData.br
< prev
next >
Wrap
Text File
|
1995-12-18
|
523b
|
32 lines
/* PackData.br
*
* Stubb to use PACKDATAFILE from cli
*/
parse arg arguments
if ~show('p', 'BBSREAD') then do
address command
"run >nil: `GetEnv THOR/THORPath`bin/LoadBBSRead"
"WaitForPort BBSREAD"
end
address BBSREAD
if arguments = '' then
do
GETCOMMANDINFO PACKDATAFILE TEMP
say '$VER: PackData.br 3.1 (09.08.94)'
say 'Lets you use the PACKDATAFILE arexx command from CLI.'
say 'Template:' TEMP
exit
end
PACKDATAFILE arguments
if(rc ~= 0) then
do
say BBSREAD.LASTERROR
exit
end